home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 15-01.C < prev    next >
Text File  |  1991-06-07  |  925b  |  40 lines
  1. #include <fastgraf.h>
  2.  
  3. main()
  4. {
  5.    long original, mem0, mem1, mem2;
  6.    int  mode, old_mode;
  7.  
  8.    printf("Which video mode? ");
  9.    scanf("%d",&mode);
  10.  
  11.    if (fg_testmode(mode,0) == 0) {
  12.       printf("Your system does not support that video mode.\n");
  13.       exit();
  14.       }
  15.    if (fg_testmode(mode,3) == 0) {
  16.       printf("Your system does not have enough memory.\n");
  17.       exit();
  18.       }
  19.  
  20.    original = fg_memavail();
  21.    old_mode = fg_getmode();
  22.    fg_setmode(mode);
  23.    mem0 = fg_memavail();
  24.    fg_allocate(1);
  25.    mem1 = fg_memavail();
  26.    fg_allocate(2);
  27.    mem2 = fg_memavail();
  28.  
  29.    fg_freepage(1);
  30.    fg_freepage(2);
  31.    fg_setmode(old_mode);
  32.    fg_reset();
  33.  
  34.    printf("originally     = %ld\n",original);
  35.    printf("after setmode  = %ld\n",mem0);
  36.    printf("after 1st page = %ld\n",mem1);
  37.    printf("after 2nd page = %ld\n",mem2);
  38.    printf("at end         = %ld\n",fg_memavail());
  39. }
  40.